Microsoft Excel2000
ファイル(F) 編集(E) 表示(V) 挿入(I) 書式(O) ツ−ル(T) デ−タ(D)
ウィンドウ(W)
その他(S)      TOP .
 
新しいウインドウを開く(N)
整列(A)
表示しない(H)
再表示(U)
分割(S)
ウィンドウ枠の固定(F)

W1.新しいウインドウを開く
●●●新しいウインドウを開いたケ−ス。

Sub Macro1()
    ActiveWindow.NewWindow
End Sub
PageTop
W2.整列
●●●並べて表示

Sub Macro1()
     Windows.Arrange ArrangeStyle:=xlTiled
End Sub
●●●上下に並べて表示

Sub Macro2()
  Windows.Arrange ArrangeStyle:=xlHorizontal
End Sub
●●●左右に並べて表示

Sub Macro3()
  Windows.Arrange ArrangeStyle:=xlVertical
End Sub
●●●重ねて表示

Sub Macro4()
  Windows.Arrange ArrangeStyle:=xlCascade
End Sub
PageTop
W3.表示しない
●●●表示されているブックを非表示にしたケ−ス。

Sub Macro1()
     ActiveWindow.Visible = False
End Sub
■ Excel95ではブックを表示にしないとマクロシ−トも表示されない為、非表示の状態では マクロの記述を変更出来なかったが、Excel97ではVBエディタで変更できる。 PageTop
W4.再表示
●●●非表示になっているブックを表示に変えたケ−ス。

Sub Macro1()
     Windows("Book6").Visible = True
End Sub
PageTop
W5.分割
●●●セル("E2")を選択してウインドウを分割したケ−ス。

Sub Macro1()
     Range("E2").Select
    With ActiveWindow
        .SplitColumn = 4
        .SplitRow = 1
    End With
End Sub
●●●分割の解除(セルは何処を選択していても関係なし)

Sub Macro2()
  With ActiveWindow
        .SplitColumn = 0
        .SplitRow = 0
    End With
End Sub
PageTop
W6.ウィンドウ枠の固定
●●●セル("C2")を選択してウインドウ枠を固定したケ−ス。

Sub Macro1()
'枠の固定
     Range("C2").Select
    ActiveWindow.FreezePanes = True
End Sub
●●●枠の解除(セルは何処を選択していても関係なし)

Sub Macro2()
   Range("C2").Select
    ActiveWindow.FreezePanes = False
End Sub
PageTop

PC用眼鏡【管理人も使ってますがマジで疲れません】 解約手数料0円【あしたでんき】 Yahoo 楽天 NTT-X Store

無料ホームページ 無料のクレジットカード 海外格安航空券 ふるさと納税 海外旅行保険が無料! 海外ホテル